200
How can I add the Desktop folder

with ExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := '::{00021400-0000-0000-C000-000000000046}>';
end
199
How can I create my own favorites folders

with ExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := '::{450d8fba-ad25-11d0-98a8-0800361b1103}|C:\Temp><b>My Projects</b>|';
	Expand('C:\Temp');
end
198
How can change the explore from folder (sample 2)

with ExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := 'C:\>';
end
197
How can change the explore from folder (sample 1)

with ExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := 'C:\';
end
196
Is it possible to include more system drives as root folders (sample 2)

with ExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := 'C:\>SYSTEM <off 4><b>1|D:\>SYSTEM <off 4><b>2|E:\>SYSTEM <off 4><b>3';
end
195
Is it possible to include more system drives as root folders (sample 1)

with ExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := 'C:\|D:\|E:\';
end
194
How can I include a system drive as a root folder, instead lists its content

with ExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := 'C:\>';
end
193
How can I add the Desktop as a root folder (sample 3, rename, new display name, root)

with ExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := '::{20D04FE0-3AEA-1069-A2D8-08002B30309D}><sha ;;0>This <b>PC</b>';
	Expand('::{20D04FE0-3AEA-1069-A2D8-08002B30309D}');
end
192
How can I add the Desktop as a root folder (sample 2)

with ExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := '::{20D04FE0-3AEA-1069-A2D8-08002B30309D}>';
	Expand('::{20D04FE0-3AEA-1069-A2D8-08002B30309D}');
end
191
How can I add the Desktop as a root folder (sample 1)

with ExFileView1 do
begin
	ExpandFolders := True;
	ExploreFromHere := '>';
	Expand('::{20D04FE0-3AEA-1069-A2D8-08002B30309D}');
end
190
How can I browse the "Public" folder

with ExFileView1 do
begin
	ExpandFolders := True;
	IncludeFilesInFolder := True;
	ExploreFromHere := '::{4336a54d-038b-4685-ab02-99bb52d3fb8b}>';
end
189
How can I browse the "Libraries" folder

with ExFileView1 do
begin
	ExpandFolders := True;
	IncludeFilesInFolder := True;
	ExploreFromHere := '::{031E4825-7B94-4dc3-B131-E946B44C8DD5}>';
end
188
How can I browse the "HomeGroup" folder

with ExFileView1 do
begin
	ExpandFolders := True;
	IncludeFilesInFolder := True;
	ExploreFromHere := '::{B4FB3F98-C1EA-428d-A78A-D1F5659CBA93}>';
end
187
How can I browse the "Games" folder

with ExFileView1 do
begin
	ExpandFolders := True;
	IncludeFilesInFolder := True;
	ExploreFromHere := '::{ED228FDF-9EA8-4870-83b1-96b02CFE0D52}>';
end
186
How can I browse the "OneDrive" folder

with ExFileView1 do
begin
	ExpandFolders := True;
	IncludeFilesInFolder := True;
	ExploreFromHere := '::{018D5C66-4533-4307-9B53-224DE2ED1FE6}>';
end
185
How can I browse the "Control Panel" folder

with ExFileView1 do
begin
	BeginUpdate();
	ColumnsVisible := EXFILEVIEWLib_TLB.exFileColumnName;
	ExploreFromHere := '::{26EE0668-A00A-44D7-9371-BEB064C98683}';
	EndUpdate();
end
184
How can I browse the "My Documents"

with ExFileView1 do
begin
	IncludeFilesInFolder := True;
	ExpandFolders := True;
	ExploreFromHere := '::{450d8fba-ad25-11d0-98a8-0800361b1103}';
end
183
How can I hide all columns, and let just the Name being visible

with ExFileView1 do
begin
	ColumnsVisible := EXFILEVIEWLib_TLB.exFileColumnName;
end
182
How can I browse the Printers and Faxes

with ExFileView1 do
begin
	ColumnsVisible := EXFILEVIEWLib_TLB.exFileColumnName;
	ExploreFromHere := '::{2227a280-3aea-1069-a2de-08002b30309d}';
end
181
How can I browse the Network Connections

with ExFileView1 do
begin
	BeginUpdate();
	ColumnsVisible := EXFILEVIEWLib_TLB.exFileColumnName;
	ExploreFromHere := '::{7007acc7-3202-11d1-aad2-00805fc1270e}';
	EndUpdate();
end
180
Is it possible to specify a different selection color, while the control has no focus

with ExFileView1 do
begin
	BeginUpdate();
	HotBackColor := SelBackColor;
	HotForeColor := SelForeColor;
	Background[EXFILEVIEWLib_TLB.exSelBackColorHide] := $f0f0f0;
	Background[EXFILEVIEWLib_TLB.exSelForeColorHide] := $10000;
	EndUpdate();
end
179
Can I change the visual item's appearance as the mouse pointer passes/hovers over it

with ExFileView1 do
begin
	BeginUpdate();
	VisualAppearance.Add(1,'gBFLBCJwBAEHhEJAAEhABNACg6AADACAxRDgMQBQKAAzAJBIYhkGYYYCgMZRVDiCYXABCEYRXBIZQ7BKNIxjSJwFiCCQwSDKEjyCKcGRHF6MI6gOYpCgOIYjRJNIASVA' + 
	'ceAAGaUZrjSgobjmOYhAJCKJUWAFFoVDCgZThGgJHomMIhBDHASQTQ8EytJqmKajCaRSDUJZkWZOIyjBd6a5tVbXEaVTAccxhOKeahvGo5Fred40TRINCWHI1d4NH69J' + 
	'bwMILSgME6FABXdhWFC+Ex9Kiea7kOqIJwyA5bY5kGRWDRkLzROAALJ1Cz7KqydpDYyAGbABagAYfPy8JzxHKNarfA5GZzuG4zdi8U41WCBdpnHQNS4KL6ndBbWrdFoi' + 
	'C8X4QnAOQ8B4dwiHQCIEhQDQmDOIZUmQZYDkIVRSmIEQ3lUGwbEIRQQh4ZpeEQGIMB0JZdkoc4XnqVB/k0CAGAKAJgEgFgGgGYBXnyVA5mCRQ4maA5NjgRJvgSTwoFYF' + 
	'oFmGCBmBqBphhgTJvDcIkFlWCJhmOLgmDoYoIiYKoKmKSI2C6CwiGOLJwgyTJ4lYAg8mOCI+DqDpjkiMJ0g+TJZAYN4OGOWQWEaCpjnOUhBDMZAzk4MYTmUCRGFKFJlE' + 
	'kRhJhKZJTjIWoWmWSR2F6F5mAmBhbhWZAoASdYZk6WYmGqGpmkmNhuhuZwJiidocmWCYaGcO4ngmZh6h6Z5JnYfofmeGZMnaHRNAoCgeiGaIKCaCoimiSgkneI5oEoPJ' + 
	'3DwaRKFaFolmmChmhqJppFOYoeiQaJ4mKIoomoSoWiaKZqgqDoeD4KBKi6KYrmsCpGDgPhrEqNoehIa4KmaOoumuSp2jqLQPhoEpAiCLBLBaRoxmyCwmkYPosksCo0jK' + 
	'LQLEaUocmyQ5qEuAomHOVoriCLYbE6Xoxm2OZMk6OJflOFJajmYwzkKQI6m6S42m6O5vAuJgRjyTY1Diao9k2G5mAiPpvkudp5DYZexGsa5AAQBCAg==');
	DefaultItemHeight := 20;
	FullRowSelect := True;
	ExploreFromHere := '';
	ExpandFolders := True;
	SelBackColor := $1ff9933;
	SelForeColor := RGB(0,0,0);
	HotBackColor := $1ffcc99;
	HotForeColor := SelForeColor;
	EndUpdate();
end
178
Can I change the item's background color as the mouse pointer passes/hovers over it

with ExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	ExpandFolders := True;
	HotBackColor := RGB(153,204,255);
	HotForeColor := SelForeColor;
	EndUpdate();
end
177
How do I programmatically select a folder, giving its full path

with ExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	ExpandFolders := True;
	Expand('C:\Windows\system32');
	EndUpdate();
end
176
How do I programmatically select a folder, giving its relative path

with ExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '';
	ExpandFolders := True;
	Expand('C:');
	EndUpdate();
end
175
I've came to the situation that while I am using single-selection, I need to be able to select nothing, so no file/folder to be selected. It is possible

// StateChange event - Fired while the control's state has been changed.
procedure TForm1.ExFileView1StateChange(ASender: TObject; State : StateChangeEnum);
begin
	with ExFileView1 do
	begin
		OutputDebugString( 'Click and press CTRL to unselect the file/folder.' );
	end
end;

with ExFileView1 do
begin
	BeginUpdate();
	SingleSel := True;
	AllowSelectNothing := True;
	ExploreFromHere := '';
	EndUpdate();
end
174
Is it possible to change the color of the selection as soon as the control is losing its focus

with ExFileView1 do
begin
	BeginUpdate();
	SingleSel := True;
	ExploreFromHere := '';
	Background[EXFILEVIEWLib_TLB.exSelBackColorHide] := $c4c4c4;
	Background[EXFILEVIEWLib_TLB.exSelForeColorHide] := $10000;
	EndUpdate();
end
173
Is it possible to hide the control's selecting when the control loses the focus
with ExFileView1 do
begin
	BeginUpdate();
	SingleSel := True;
	ExploreFromHere := '';
	HideSelection := True;
	EndUpdate();
end
172
Can I display the folder name only, without other information like size, type, modified...

with ExFileView1 do
begin
	BeginUpdate();
	SelectOnRelease := True;
	IncludeParentLabel := '<b><%0%></b>, <fgcolor=808080>...A* folders only';
	IncludeFolderFilter := 'A*';
	ExploreFromHere := 'C:\Windows\';
	BrowseFolderPath := 'C:\Windows\addins';
	DisplayFoldersInfo := False;
	FullRowSelect := True;
	EndUpdate();
end
171
Recently, I have noticed a small arrow in the right side of each folder, so the question is how can I get ride of that

with ExFileView1 do
begin
	BeginUpdate();
	SelectOnRelease := True;
	SingleSel := False;
	ExploreFromHere := '';
	IncludeSubFolderIconKey := 0;
	EndUpdate();
end
170
Can I select files/folders when user releases the mouse, rather than clicking it
with ExFileView1 do
begin
	BeginUpdate();
	SelectOnRelease := True;
	SingleSel := False;
	ExploreFromHere := '';
	EndUpdate();
end
169
I am using the IncludeParent property. Is there any option so I can display the parent label all the time, no matter if the control is vertically scrolled

with ExFileView1 do
begin
	BeginUpdate();
	IncludeFolders := True;
	ExpandFolders := True;
	IncludeParent := EXFILEVIEWLib_TLB.exIncludeLockedParent;
	EndUpdate();
end
168
How can I freeze the events, so no event is fired
// StateChange event - Fired while the control's state has been changed.
procedure TForm1.ExFileView1StateChange(ASender: TObject; State : StateChangeEnum);
begin
	with ExFileView1 do
	begin
		OutputDebugString( 'This will ne never fired, until FreezeEvents(False) is called.' );
	end
end;

with ExFileView1 do
begin
	FreezeEvents(True);
	SelectOnRelease := True;
end
167
The focusing item does not get marked when selected

with ExFileView1 do
begin
	BeginUpdate();
	SingleSel := False;
	with VisualAppearance do
	begin
		Add(1,'gBFLBCJwBAEHhEJAAEhABHoDg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJwFiCCQwSDKEjyCKcGRHF6MI6gOYpCgOIYjRJNIASVA' + 
	'ceAAGaUZrjSgobjmOYhAJCLqhYIgASXJqLaBlOCaAieSc+QhjQJIJoeCZXU5TFg1BTsOhqEqcRiseaRVDCaIJWzbdYWLDdNQHHKYLjnWorbpSJZ5XjNEySDQkMS9PrEJ' + 
	'7vST8FBCdAABLJUB2BR9RwxRafKpnWwJDpmCaOQLXEB5DK1PyVMTKYrtGy7GrIAJxWxbV4UHh+QABOzIMAvHKJMwvHYcUZne5XVLeF41HbONogPaJZyIAK2cLROq6Xo7' + 
	'GEcJZEcLASB4DwvgWUZlE6AQQhKAYkkYdA6hyDIwHgSoqFwQgmnsYxjGgSIiBOTpSEiAwRgOJI7j4JAHA6U5wm0MpPlOBIjD8TZiGYCICiCGAuA6AxhAgMgSgOYQ4DYB' + 
	'g/g6cw1n+ABOmMMJ9DmCwjnScw4RsVJngkYh4hoKIKmKKI2CmC5ikiQgqgiT5jhyMw8g4QwIn0OIKEiCJhD8DwTGyfA7k0WQOEWEQkGkJhIhKZB5DYSoTiSCQEn4PQOC' + 
	'OXJcCeIJjliaIQk0aRyF4O5llmAhfhgZhJg4ZoYiaAxYn4PZOhOZJaCUZYTiYQw1mcOZUm+HQnHmWh4h6Z4pnYeYfk0eYsmqG4nAgNJ2DqD5DkCWoiGiOgqgyI5omoRo' + 
	'NiSaQKFKEojCaM4ugSFhOjkAJcieKgDkaH4oioGoOiaKRqgqEoqDddwyhuAxPgOMJ8DyDZqk6NYtCsapmjiLprHqdo6i+K5K1oPhOlqPgKD4DpjnII4yiOewuk6MxtAs' + 
	'MpSjObQ7EaT4wk6ewYn0PgPAiCJkjeLgDk6X44i4G4OmaORuguEpqDkLAzkaWg+E8GIUmaPIvEOVpzj2Lxbl6eo+G+S5in4OYPmOaJyjuTwjnYWpBg6DAjAqQZwkwJwN' + 
	'kKcJsEcEJCDBEpaD6Dw8BiapGjGSgfB2RpxmyBwgkicZ8haBw/g+M5TBcPQPlOXJskscp8jsMJMnMLJXDGTZzEyYw2kwMoDlcFw9i2M4/EGUJPg0CxFlENBtCcSJSnQf' + 
	'Q0m+SgPHsaJ7lALZLG6XZVHWDRfFqVY1k0ZxdladYTnifJUGaeAWAeMnSGcGWgBObJ3lWbwdjKW5cHcTZPHaLkN4GxXDlFqFsA4uRbBOGAFAEIzAsDEFOBkfYqR4D6AO' + 
	'BEYo8QuBvAmMceInBDgcD0JwOIqQyJ1DMAwG4IANDnHSMoK4QhOgMBGNEIQvQWAdGenETIswGiddsAAQAgCAgA==');
	end;
	SelBackColor := $1000000;
	SelForeColor := RGB(0,0,0);
	ShowFocusRect := True;
	Background[EXFILEVIEWLib_TLB.exShowFocusRect] := $1;
	EndUpdate();
end
166
Can I change the visual appearance of the focused item

with ExFileView1 do
begin
	BeginUpdate();
	SingleSel := False;
	with VisualAppearance do
	begin
		Add(1,'gBFLBCJwBAEHhEJAAEhABHoDg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJwFiCCQwSDKEjyCKcGRHF6MI6gOYpCgOIYjRJNIASVA' + 
	'ceAAGaUZrjSgobjmOYhAJCLqhYIgASXJqLaBlOCaAieSc+QhjQJIJoeCZXU5TFg1BTsOhqEqcRiseaRVDCaIJWzbdYWLDdNQHHKYLjnWorbpSJZ5XjNEySDQkMS9PrEJ' + 
	'7vST8FBCdAABLJUB2BR9RwxRafKpnWwJDpmCaOQLXEB5DK1PyVMTKYrtGy7GrIAJxWxbV4UHh+QABOzIMAvHKJMwvHYcUZne5XVLeF41HbONogPaJZyIAK2cLROq6Xo7' + 
	'GEcJZEcLASB4DwvgWUZlE6AQQhKAYkkYdA6hyDIwHgSoqFwQgmnsYxjGgSIiBOTpSEiAwRgOJI7j4JAHA6U5wm0MpPlOBIjD8TZiGYCICiCGAuA6AxhAgMgSgOYQ4DYB' + 
	'g/g6cw1n+ABOmMMJ9DmCwjnScw4RsVJngkYh4hoKIKmKKI2CmC5ikiQgqgiT5jhyMw8g4QwIn0OIKEiCJhD8DwTGyfA7k0WQOEWEQkGkJhIhKZB5DYSoTiSCQEn4PQOC' + 
	'OXJcCeIJjliaIQk0aRyF4O5llmAhfhgZhJg4ZoYiaAxYn4PZOhOZJaCUZYTiYQw1mcOZUm+HQnHmWh4h6Z4pnYeYfk0eYsmqG4nAgNJ2DqD5DkCWoiGiOgqgyI5omoRo' + 
	'NiSaQKFKEojCaM4ugSFhOjkAJcieKgDkaH4oioGoOiaKRqgqEoqDddwyhuAxPgOMJ8DyDZqk6NYtCsapmjiLprHqdo6i+K5K1oPhOlqPgKD4DpjnII4yiOewuk6MxtAs' + 
	'MpSjObQ7EaT4wk6ewYn0PgPAiCJkjeLgDk6X44i4G4OmaORuguEpqDkLAzkaWg+E8GIUmaPIvEOVpzj2Lxbl6eo+G+S5in4OYPmOaJyjuTwjnYWpBg6DAjAqQZwkwJwN' + 
	'kKcJsEcEJCDBEpaD6Dw8BiapGjGSgfB2RpxmyBwgkicZ8haBw/g+M5TBcPQPlOXJskscp8jsMJMnMLJXDGTZzEyYw2kwMoDlcFw9i2M4/EGUJPg0CxFlENBtCcSJSnQf' + 
	'Q0m+SgPHsaJ7lALZLG6XZVHWDRfFqVY1k0ZxdladYTnifJUGaeAWAeMnSGcGWgBObJ3lWbwdjKW5cHcTZPHaLkN4GxXDlFqFsA4uRbBOGAFAEIzAsDEFOBkfYqR4D6AO' + 
	'BEYo8QuBvAmMceInBDgcD0JwOIqQyJ1DMAwG4IANDnHSMoK4QhOgMBGNEIQvQWAdGenETIswGiddsAAQAgCAgA==');
		Add(2,'gBFLBCJwBAEHhEJAAEhABeEGACAADACAxRDgMQBQKAAzAJBIYhkGYYYCgMZRUDGCYXABCEYRXBIZQ7BKNIxjSJwFgmEgADDFIBQSLAYROGSDJBGODJDjWGIeQLOEhQHI' + 
	'MRxPE6UYLhWYpBDKPYcUbGc7yBBMVwGf59XzACoKSheQIVSDQkw6Fo6NYhAxHALyNRkBy8f60KjtGpodDUJYvW5JYyjBZ8EznOqbJBkeJ7BgOe5NQjaD72VgdWQJFSWJ' + 
	'ajWYYJDOJY2ZAAE5TVINEwxJbDaylChIdxaF6WAzZEBhBYoATPNLBMrhWqKDw2XaQWBCOgwHYeR5LU7BdRwbIrRq2eAAXbcVyXfDddZlBK+QA0SK9lRVTKvJZmKgBWw1' + 
	'COSxmAAGw4kcNx1iKFBiCAfQsG8lJemucg7nsXpUHOOxrm+DI3jOH4XAOBx2nscw0j2HhPG4L5uGEVIECQCBCEUAYkGMHQHFGSBlGaAxkEgQgTGCVBsDYQhCgQJZrHKU' + 
	'ggGEShkFGNgIlsNpPnMHJHD+TADAIJIJiIWIeCqChikiIgmgiD5zHyXxgiACJKCuC4jHiZgtg6I4IlkCQwkwOIonMPJjEkFhGhGZBpA4KoMBCGJuEiE5lAkGg7hMY4JE' + 
	'YVoUCUNAOE6FZl0KWQACWOR2GKF5mBmChchkJRZhoXYaCKKYqGuDglEmNhuhWZpIiYc4dCcCRqGmHZlgm2YxAwSQKESHwkFkKgpiAIAIH4PIimOOg2DiChoiQJRRD+TZ' + 
	'DHCfwyAyCgyg+JpiioYJ/DgDgIlECQ6lwRAEICA=');
		Add(3,'CP:2 -1 0 1 0');
	end;
	SelBackColor := $1000000;
	SelForeColor := RGB(0,0,0);
	Background[EXFILEVIEWLib_TLB.exShowFocusRect] := $3000000;
	EndUpdate();
end
165
How do I check if an object is a file or folder

// StateChange event - Fired while the control's state has been changed.
procedure TForm1.ExFileView1StateChange(ASender: TObject; State : StateChangeEnum);
begin
	with ExFileView1 do
	begin
		with (IUnknown(Get[EXFILEVIEWLib_TLB.CheckItems].Item[OleVariant(0)]) as _TLB.Object) do
		begin
		end;
	end
end;

with ExFileView1 do
begin
	BeginUpdate();
	HasCheckBox := EXFILEVIEWLib_TLB.CheckBox;
	EndUpdate();
end
164
How do I get the selected item
// StateChange event - Fired while the control's state has been changed.
procedure TForm1.ExFileView1StateChange(ASender: TObject; State : StateChangeEnum);
begin
	with ExFileView1 do
	begin
		OutputDebugString( Get[EXFILEVIEWLib_TLB.SelItems].Item[OleVariant(0)] );
	end
end;

with ExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '::{00021400-0000-0000-C000-000000000046}';
	ExpandFolders := True;
	IncludeFiles := False;
	ColumnVisible['Size'] := False;
	ColumnVisible['Type'] := False;
	ColumnVisible['Modified'] := False;
	HeaderVisible := False;
	ExpandOnDblClk := True;
	AllowRename := True;
	EndUpdate();
end
163
How can I browse the "Recycle Bin" folder
with ExFileView1 do
begin
	ExploreFromHere := '::{645FF040-5081-101B-9F08-00AA002F954E}';
end
162
How can I browse the "Documents" folder
with ExFileView1 do
begin
	ExploreFromHere := '::{450D8FBA-AD25-11D0-98A8-0800361B1103}';
end
161
How can I browse the "Control Panel" folder
with ExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '::{21EC2020-3AEA-1069-A2DD-08002b30309d}';
	ColumnVisible['Size'] := False;
	ColumnVisible['Type'] := False;
	ColumnVisible['Modified'] := False;
	EndUpdate();
end
160
How can I simulate the tree part of Windows Explorer

with ExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := '::{00021400-0000-0000-C000-000000000046}';
	ExpandFolders := True;
	IncludeFiles := False;
	ColumnVisible['Size'] := False;
	ColumnVisible['Type'] := False;
	ColumnVisible['Modified'] := False;
	HeaderVisible := False;
	ExpandOnDblClk := True;
	EndUpdate();
end
159
How can I browse the Network folder
with ExFileView1 do
begin
	ExploreFromHere := '::{F02C1A0D-BE21-4350-88B0-7367FC96EF3C}';
end
158
How can I browse the My Computer

with ExFileView1 do
begin
	ExploreFromHere := '::{20D04FE0-3AEA-1069-A2D8-08002B30309D}';
end
157
How can I browse the My Network Places folder

with ExFileView1 do
begin
	ExploreFromHere := '::{208D2C60-3AEA-1069-A2D7-08002B30309D}';
end
156
How can I browse the Desktop folder

with ExFileView1 do
begin
	ExploreFromHere := '::{00021400-0000-0000-C000-000000000046}';
end
155
Does your control supports scrolling by touching the screen

with ExFileView1 do
begin
	AutoDrag := Integer(EXFILEVIEWLib_TLB.exAutoDragScrollOnShortTouch) Or Integer(EXFILEVIEWLib_TLB.exAutoDragScroll);
end
154
Do you have any Fit-To-Page options when printing the control

with ExFileView1 do
begin
	BeginUpdate();
	with FileTypes.Add('*') do
	begin
		Folder := True;
		StrikeOut := True;
		Apply();
	end;
	EndUpdate();
	with (IUnknown(ComObj.CreateComObject(ComObj.ProgIDToClassID('Exontrol.Print'))) as EXPRINTLib_TLB.Print) do
	begin
		Options := 'FitToPage = On';
		PrintExt := (IUnknown(ExFileView1.DefaultInterface) as EXFILEVIEWLib_TLB.ExFileView);
		Preview();
	end;
end
153
Is it possible to expand all folder

with ExFileView1 do
begin
	BeginUpdate();
	ExploreFromHere := 'C:\Program Files\Microsoft.NET';
	ExpandFolders := True;
	Expand('*');
	EndUpdate();
end
152
How can I provide my own context menu

// StateChange event - Fired while the control's state has been changed.
procedure TForm1.ExFileView1StateChange(ASender: TObject; State : StateChangeEnum);
begin
	with ExFileView1 do
	begin
		OutputDebugString( 'State ' );
		OutputDebugString( State );
		OutputDebugString( 'ContextMenu' );
		OutputDebugString( ShowContextMenu );
		ShowContextMenu := 'Item 1[id=1][def],Item 2[id=2],[sep][id=3],Popup[id=4](Item 3[id=5],Item 4[id=6])';
		OutputDebugString( 'ExecuteContextMenu' );
		OutputDebugString( ExecuteContextMenu );
	end
end;
151
Is it possible to prevent executing a specific command from the object's context menu

// StateChange event - Fired while the control's state has been changed.
procedure TForm1.ExFileView1StateChange(ASender: TObject; State : StateChangeEnum);
begin
	with ExFileView1 do
	begin
		OutputDebugString( 'State ' );
		OutputDebugString( State );
		OutputDebugString( 'ContextMenu' );
		OutputDebugString( ShowContextMenu );
		OutputDebugString( 'ExecuteContextMenu' );
		OutputDebugString( ExecuteContextMenu );
		ExecuteContextMenu := 0;
	end
end;
150
How can I disable the Delete command from the object's context menu

// StateChange event - Fired while the control's state has been changed.
procedure TForm1.ExFileView1StateChange(ASender: TObject; State : StateChangeEnum);
begin
	with ExFileView1 do
	begin
		OutputDebugString( 'State ' );
		OutputDebugString( State );
		OutputDebugString( 'ContextMenu' );
		OutputDebugString( ShowContextMenu );
		ShowContextMenu := FormatABC('value replace `&Delete` with `&Delete[dis]`',OleVariant(ShowContextMenu),Null,Null);
	end
end;
149
How can I change the label to be displayed in the parent folder

with ExFileView1 do
begin
	IncludeParent := True;
	IncludeParentLabel := '<b><%0%>';
	ExploreFromHere := 'C:\';
	BrowseFolderPath := 'C:\Temp';
end
148
How can I change the +/- button's images (method 2)

with ExFileView1 do
begin
	BeginUpdate();
	with VisualAppearance do
	begin
		Add(1,'gBFLBCJwBAEHhEJAEGg4BCwCg6AADACAxRDAMgBQKAAzQFAYahmG6GAAGEZhYgmFgAQhFcZQSKUOQTDKMIziaQIRDINQlSTJcQjKKEUQTFiXIyAKKwEgmEQMQiCcbzXI' + 
	'UBxAAqXZZFUaKAg2Qg4TLBAzUTCQbR7HieQghGoqPpWF4gAhCJQGSYZaDqOQyRhkCC4DIITZkRbTUBiRSdWx8AAMIyiGpoJbudjyXg6V5OTblez9P7AMBvS6nKrhcp2P' + 
	'rhTSYWr+Gp5R7IMhyLI8Uw/DS/Yq1GDYIiuOoIQhCUD0LQ9EyXJqnaJnaC5aiuCT7VRjWDYFgFdTpQC8bZuGz7Trmd59XTadhYHSsAyNRDCL6tayLDxSZabZ5aOa6HoH' + 
	'EuJIxmOL50HgBAWgmDpEGGLJWAqbwPg+RZkH+eg9D4TxfhuRZeGGdwQH2PQTCmDpFFaKoVB+D5Xmed5pHoX44AWfR+F8UwVnEdpdkMMJKDIChygyIQpAoEh4iIJ5JlgT' + 
	'IcH+XoIFoEwnGEAh6A0KBgiMIICHdLgIlAM4MlKAIcCaIYIjYLoLGKIhqCcMxiSAJQ1A0IxEhsJgJFiPg+guI4yFYOA0GMWIUloNhNGIaIXCUI5CE4SwkEkchMhGCxlB' + 
	'kQIUCQZJZCiFIRk0aQVH8IBmAOBJeDcZJYmyFgnAmAhaGaCxmGmIhqhoZJZgiXYYAgFgCHQOYOFOEITCQCJpCyEoTVaNoACUZJiFCEoekiaZgmSHQXlYEh0DuDpTjCDQ' + 
	'iEgchAg0IpJBoXoZiYKYqHaHAimkYguhMIZpAOMh0GEGBmg6JYqmkGowmyK4rAqNoyDsGg2BmCApCuAgNh8agrkqdYkGea4ChGCBAEAgIA==');
		Add(2,'gBFLBCJwBAEHhEJAEGg4BDACg6AADACAxRDAMgBQKAAzQFAYahmG6GAAGEZhYgmFgAQhFcZQSKUOQTDKMIziaQIRDINQlSTJcQjKKEUQTFiXIyAKKwEgmEQMQiCcbzXI' + 
	'UBxAAqXZZFUaKAg2Qg4TLBAzUTCQbR7HieQghGoqPpWF4gAhCJQGSYZaDqOQyRhkCC4DIITZkRbTUBiRSdWx8AAMIyiGpoJbudjyXg6V5OTblez9P7AMBvS6nKrhcp2P' + 
	'rhTSYWr+Gp5R7IMhyLI8Uw/DS/Yq1GDYIiuOoIQhCUD0LQ9EyXJqnaJnaC5aiuCT7VRjWDYFgFdTpQC8bZuGz7Trmd59XTadhYHSsAyNRDCL6tayLDxSZabZ5aOa6HoH' + 
	'EuJIxmOL50HgBAWgmDpEGGLJWAqbwPg+RZknOeY9D4XxfHmB5cEGdp0EyJg7BUWoqFQfY/B8f5PnOd5+H6IAHkyRR7l2NxwkwMoMgKHIjCgShCgSHgogmch2BAJwhDgV' + 
	'IfgUIQYDSHoCgoGAckgIIdkgFICDQDJjDSIAnAmI5+CqCpikiNgugqYhyGoJAzGIAgKCINQNCMRIbCYCRYj4PoPmOMhWDgNBjFiCJaDYTRiGiFwlCOQhOEsJBJHIThQh' + 
	'SJQZE4UAlAkGQ2EoJQkHMWhFF+SAZgSYQ3g2WQ2DsJYJkIYIWhmZpJioZ4aGaOYqE2GJNlmBIBGAJxjhiZQ5AkMhAg6nwpDaAglEkOgOgWIQoAmdIOh6DhJlkfRhWQOJ' + 
	'tDsCJSCSBwkXSLIRiYaY6GqHInmmYguhgIppFIHoSDsJxmBGBhomoeo2hOK4OkqQoyiuaxDjGIxhhiAoSjoIJZnaIo+i+WhGH6OgpBiBAEIC');
	end;
	HasCheckBox := EXFILEVIEWLib_TLB.PartialCheckBox;
	ExpandFolders := True;
	Background[EXFILEVIEWLib_TLB.exTreeGlyphOpen] := $1000000;
	Background[EXFILEVIEWLib_TLB.exTreeGlyphClose] := $2000000;
	Indent := 19;
	EndUpdate();
end
147
How can I change the +/- button's images (method 1)

with ExFileView1 do
begin
	BeginUpdate();
	LoadIconsKey := 1234;
	LoadIcons('gBJJgBAICAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' + 
	'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1BfeBf7ywj/dWHf7pxWJxeKdOMx+OyGTyWVxeHdWDwuBfb/zmaeWGxGWyON02l1GU0' + 
	'+izOE0Ofv9J1z/am1f6/3D/Xm73W83a83vA3/B4nD4283C/2m22ez2rU2+54/C33V6nX4vW6PK5+gf+xpGYf6V8j/QiEQr/Qfr9Xs9aD9vw9/x+nz+3s8/p8iV1n9/bz' + 
	'PQ+r3QG+UCQFAsEQA/TyvE8Cjsk/J/mOYZgn+YBel1CxeQyYENw1DkPQ7EERw/C0MQlCkFNUx8IwnCsLxJEUSxlGkQxtDkTxdFTJQcozJPmYhhOUW5aFif8iFlI5aSTJ' + 
	'ElSZJcnSjJsiSNILlPm0j6StJUjSnKEvSfMMpS/Ip/y3LDFx6orJEE9hjmIYZ/lmWBXTlOk7TrOc6ooik9TxP8/TfOM2vhLNCQlOFATvP1GUXR080fP9BH/Q8eTUoc2P' + 
	'YZRjmKf5WlUVFPVBUVQ0/UM+IhU1SVXVVN07SrV0PV1WVHVVbVrXFS1zVdZ1gx9L0wxZBTaf5mGUZB/lOUZQn+UhQk8f5RE+Ttok+TlUIhaVr2lalnWhZVmWNZFh0LWN' + 
	'iXFZNl2bZ9q2pbVq23a14Xbddv3VdFyMnYChTZYZ/mgZxmn+UBOE1bGD4RhGCYNgGBWGQUV0pf2G4HguE4vjGF3/gOJYhS19p/fuIGoaRon+TZMP5jGV2xlD+ZJk2H4j' + 
	'mWYZPlOWZwimXNpkuO31kGQ2FfxtGyax/k0S5KH/lJJn/pJI6cSeoYOS+pacSmoaZo+kn/omjZlQ2h6Lrela1p+o6hqu06ttWr6ySum6RpWvZ9j+gJ4yRA70f5wm8bul' + 
	'7hmxLH+ThMcHlHB4PxHCcNwXAabvu/70QOI8nvm/cfx3C8PxvF89xvN8drXIn/y27bunW872cxynIf5JkgR2rklzOtYPrWzEp2nYdl1nXdM1fLd91/Y9n2vA9x5Hlabp' + 
	'Pd+L4fgV/1CePFyx3Hadh/kaRJDn+SBGkWf5I/B8XyfH8Pz/L9Hye/8Pt+76/s8s8Xq73+Pte573zf39f+/U/99r+H4PYdK3tBr0ydmzPm/eBkBIGvZgeP+CME4CHzOa' + 
	'YWBcDoNQQg3BKDsFIOQhPobOBBOzPikhQeo86B4WH3QTC4+sK4UCkM8YKE8KRBwrhhDtA0PIXwyhSbCEpOSLA+JXEYjxICREkAASUlETicEQiHFMpxAQ');
	HasCheckBox := EXFILEVIEWLib_TLB.CheckBox;
	ExpandFolders := True;
	Background[EXFILEVIEWLib_TLB.exTreeGlyphOpen] := $4d2;
	Background[EXFILEVIEWLib_TLB.exTreeGlyphClose] := $4d3;
	Indent := 19;
	EndUpdate();
end
146
How can I change the check box button's images (method 2)

with ExFileView1 do
begin
	BeginUpdate();
	LoadIconsKey := 1234;
	LoadIcons('gBJJgBAICAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' + 
	'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1JJuBAGBJuDwWEw2FxGLw+Nws8xmKx2JymRyuCv9dy2byecyWfyk0z2X0Gj0eZqmWL' + 
	'mrADE1wAfexmuxfet15e3Gkluq1muYmw2U02m23+4L261FPyzJ5lF5jJ5Er5fNonP6PJpmW4dE4eWlna4MzYfjACi80t7uT7HrorR9wALXxABW+gAYv33fq9n7njb/wA' + 
	'NWLj5vq+grAAMUEAAdcFpQ7z+KRBylQjBr9JUc8LgAMkNQA1hFQ9AcDQKAA+RI4DawnB6iRQo8VozFoADZGIADhGgAHDG6UFXHUQR4UkfAAacgwzDcUxYyZ8yQoskHy6' + 
	'8KNBJaUExKQAHvKqYlvLEeREZsuSpK0iqMyxlzGosxmXJqNzFMigGDNoACxOEDwTBZ1zBMLJjBPIAOsnjrTyME0I0y0/z26idn7RFCug+ItAAP1Hx5O0VM7SjS0q3TEN' + 
	'FS7TUuPtPAAeFQgAWNSTfOMRUlI1LVXTFLshTdYVZTKNRFVFU1upVbVxXdeK+iwfJXYCPJAkSSAAkqUWQnCIV6mxgAfZ6NkAA9po2A5B2ujYPnHbdtHGDwxo2h5+BncR' + 
	'/nwCaNh+eYYAHdR5hjdyNW2CZB28D5ho2B5hgeYNpWpZQAWeYAE3Mf5+4Mf6NoCA');
	HasCheckBox := EXFILEVIEWLib_TLB.CheckBox;
	ExpandFolders := True;
	Background[EXFILEVIEWLib_TLB.exCheckBoxState0] := $4d2;
	Background[EXFILEVIEWLib_TLB.exCheckBoxState1] := $4d3;
	EndUpdate();
end
145
Is it possible to show the entire line when selecting files or folders

with ExFileView1 do
begin
	FullRowSelect := True;
end
144
How do I enable the scrollbar-extension, as thumb to be shown outside of the control's client area

with ExFileView1 do
begin
	BeginUpdate();
	ScrollPartVisible[EXFILEVIEWLib_TLB.exVScroll,EXFILEVIEWLib_TLB.exExtentThumbPart] := True;
	ScrollPartVisible[EXFILEVIEWLib_TLB.exHScroll,EXFILEVIEWLib_TLB.exExtentThumbPart] := True;
	ScrollPartVisible[EXFILEVIEWLib_TLB.ScrollBarEnum($2),EXFILEVIEWLib_TLB.exExtentThumbPart] := True;
	ScrollWidth := 4;
	Background[EXFILEVIEWLib_TLB.exVSBack] := $f0f0f0;
	Background[EXFILEVIEWLib_TLB.exVSThumb] := $808080;
	ScrollHeight := 4;
	Background[EXFILEVIEWLib_TLB.exHSBack] := Background[EXFILEVIEWLib_TLB.exVSBack];
	Background[EXFILEVIEWLib_TLB.exHSThumb] := Background[EXFILEVIEWLib_TLB.exVSThumb];
	Background[EXFILEVIEWLib_TLB.exScrollSizeGrip] := Background[EXFILEVIEWLib_TLB.exVSBack];
	EndUpdate();
end
143
How can I change the check box button's images (method 1)

with ExFileView1 do
begin
	BeginUpdate();
	with VisualAppearance do
	begin
		Add(1,'gBFLBCJwBAEHhEJAEGg4BgsHQAAYAQGKIYBkAKBQAGaAoDDYMwzQwAAxDMKEEwsACEIrjKCRShyCYZRhGcTSBCIZBqEqSZLiEZRQiiCYsS5GQBSFDcOwHGyQYDkCQpAA' + 
	'WL4tCyNc7QHKFAxnAgaaLAAYRVjSH5OAADcI1FLUEyUf6sAArB74XiCIAIQiUBomGahajkMoYZAAaDCCI2a4aDZCIoVHalKgxC5oKSqCJqbptMZ/HrgJQYGRuC4NQ7Cc' + 
	'DKDATbr9MZ9ZBCNZoPimEYtS7MMLyRB8QpyAytaBhRaaGwmSr3U7Oc50d69FYTIxcYZoCq1XBOGYMZLcNR3La9YYnBqMbRAeJYNped6NSDVcKxLgaa4fTrOZZzHL9Hpv' + 
	'iMWYBnWOr+kwJ4zlqY53CAZQ/B4GZzmab5qHyT4cDeDInkwPp8DCTI/h+Iw7nMZZhj4B5eGKL57gYGAgAadZoG8sgBgYfxKjcSRYCCYJGGYDoDmCQgNh0ZIZAaSB2gWY' + 
	'J2F4FwdhsJpuBQfRiAWdQJEAQCAg');
		Add(2,'gBFLBCJwBAEHhEJAEGg4BVUMQAAYAQGKIYBkAKBQAGaAoDDYMwzQwAAxDMKEEwsACEIrjKCRShyCYZRhGcTSBCIZBqEqSZLiEZRQiiCYsS5GQBSFDcOwHGyQYDkCQpAA' + 
	'WL4tCyNc7QHKFAxnAgaaLAAYRVjSH5OAADcI1FLUEyUf6sAArB74XiCIAIQiUBomGahajkMoYZAAaDCCI2a4aDZCIoVHalKgxC5oKSqCJqbptMZ/HrgJQYGRuC4NQ7Cc' + 
	'DKDATbr9MZ9ZBCNZoPimEYtS7MMLQXK8QpyAytaBhRaaGwmSr3U7Oc50d69FYQXqvYZoCq1XBOGYMZLcNR3La9YYnBqMbRAeJYNpedy2YbkFC5LStHwbCrBVpxWotDxQ' + 
	'jWVgrHYGI9iybhbiGUo+jafA6DKZxjkoVgxHoHR+iqXx2jMA52l8XJ/CMJ5TkaCp7nmOwHk+XovmECR8BWMYyAIHAgEOBgGFaSo4CWeQVgoSA0lOA5fEGEZQBSYRGBie' + 
	'YFlWMhiBoPZhkabI3geYIzDYIoHA8dxAH2CZYGMLgqHeW4zAYLgWCMB4gGIeoOjcQgJCqWBhgIOhvGKRhAn2D5blcWBaB+JBGi2EhWAgOQlhmEpYgiHB9DwJQCloUgWm' + 
	'UQoOFaEZXlaSB2haZJGF4WwdhsJRslmGJGDmFhYg8ZoHBiZYalCFAEIC');
	end;
	HasCheckBox := EXFILEVIEWLib_TLB.PartialCheckBox;
	ExpandFolders := True;
	Background[EXFILEVIEWLib_TLB.exCheckBoxState0] := $1000000;
	Background[EXFILEVIEWLib_TLB.exCheckBoxState1] := $2000000;
	Background[EXFILEVIEWLib_TLB.exCheckBoxState2] := $2d7f7f2;
	EndUpdate();
end
142
Is it possible to displays only KB, MB, GB when case, so with no Bytes

with ExFileView1 do
begin
	Option[EXFILEVIEWLib_TLB.exSizeFormat] := OleVariant(14);
end
141
Is it possible to displays Bytes, KB, MB, GB when case

with ExFileView1 do
begin
	Option[EXFILEVIEWLib_TLB.exSizeFormat] := OleVariant(15);
end
140
Is it possible to displays Bytes combined with Mega-Bytes(MB) in the Size column

with ExFileView1 do
begin
	Option[EXFILEVIEWLib_TLB.exSizeFormat] := OleVariant(5);
end
139
Is it possible to displays Giga-Bytes(GB) only in the Size column

with ExFileView1 do
begin
	Option[EXFILEVIEWLib_TLB.exSizeFormat] := OleVariant(8);
end
138
Is it possible to displays Mega-Bytes(MB) only in the Size column

with ExFileView1 do
begin
	Option[EXFILEVIEWLib_TLB.exSizeFormat] := OleVariant(4);
end
137
Is it possible to displays Kilo-Bytes(KB) only in the Size column

with ExFileView1 do
begin
	Option[EXFILEVIEWLib_TLB.exSizeFormat] := OleVariant(2);
end
136
Is it possible to displays Bytes only in the Size column

with ExFileView1 do
begin
	Option[EXFILEVIEWLib_TLB.exSizeFormat] := OleVariant(1);
end
135
How can I simulate a go back or navigating to the parent folder

// Click event - Occurs when the user clicks the list.
procedure TForm1.ExFileView1Click(ASender: TObject; );
begin
	with ExFileView1 do
	begin
		BrowseFolderPath := '..';
	end
end;

with ExFileView1 do
begin
	BrowseFolderPath := 'C:\Program Files';
end
134
Does your control support runtime filter

with ExFileView1 do
begin
	BeginUpdate();
	ColumnFilterButton['Name'] := True;
	AddColumnCustomFilter('Name','All  Project Files (*.sln, *.dsw)','*.sln|*.dsw');
	AddColumnCustomFilter('Name','Solution Files (*.sln)','*.sln');
	AddColumnCustomFilter('Name','Compatible Workspace Files (*.dsw)','*.dsw');
	FilterBarDropDownWidth['Name'] := -212;
	ColumnFilterButton['Type'] := True;
	FilterBarDropDownWidth['Type'] := -128;
	ColumnFilterButton['Modified'] := True;
	EndUpdate();
end
133
How can I reffer a folder or a file, without using the wild characters

with ExFileView1 do
begin
	with FileTypes.Add('TEMP') do
	begin
		HasPattern := False;
		Folder := True;
		Bold := True;
		Apply();
	end;
end
132
How do I change the text being diplayed in the Type column for specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*.bat') do
	begin
		Folder := False;
		Type := '__newtype__';
		Apply();
	end;
end
131
How do I change the text being diplayed in the Type column for specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := False;
		Type := '__newtype__';
		Apply();
	end;
end
130
How do I change the text being diplayed in the Type column for specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('W*') do
	begin
		Folder := True;
		Type := '__newtype__';
		Apply();
	end;
end
129
How do I change the text being diplayed in the Type column for specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := True;
		Type := '__newtype__';
		Apply();
	end;
end
128
How do I underline specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*.bat') do
	begin
		Folder := False;
		Underline := True;
		Apply();
	end;
end
127
How do I underline specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := False;
		Underline := True;
		Apply();
	end;
end
126
How do I underline specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('W*') do
	begin
		Folder := True;
		Underline := True;
		Apply();
	end;
end
125
How do I underline specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := True;
		Underline := True;
		Apply();
	end;
end
124
How do I draw as strikeout specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*.bat') do
	begin
		Folder := False;
		StrikeOut := True;
		Apply();
	end;
end
123
How do I draw as strikeout specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := False;
		StrikeOut := True;
		Apply();
	end;
end
122
How do I draw as strikeout specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('W*') do
	begin
		Folder := True;
		StrikeOut := True;
		Apply();
	end;
end
121
How do I draw as strikeout specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := True;
		StrikeOut := True;
		Apply();
	end;
end
120
How do I draw as italic specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*.bat') do
	begin
		Folder := False;
		Italic := True;
		Apply();
	end;
end
119
How do I draw as italic specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := False;
		Italic := True;
		Apply();
	end;
end
118
How do I draw as italic specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('W*') do
	begin
		Folder := True;
		Italic := True;
		Apply();
	end;
end
117
How do I draw as italic specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := True;
		Italic := True;
		Apply();
	end;
end
116
How do I bold specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*.bat') do
	begin
		Folder := False;
		Bold := True;
		Apply();
	end;
end
115
How do I bold specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := False;
		Bold := True;
		Apply();
	end;
end
114
How do I bold specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('W*') do
	begin
		Folder := True;
		Bold := True;
		Apply();
	end;
end
113
How do I bold specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := True;
		Bold := True;
		Apply();
	end;
end
112
How do I change the background color for specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*.bat') do
	begin
		Folder := False;
		BackColor := $ff;
		Apply();
	end;
end
111
How do I change the background color for specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := False;
		BackColor := $ff;
		Apply();
	end;
end
110
How do I change the background color for specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('W*') do
	begin
		Folder := True;
		BackColor := $ff;
		Apply();
	end;
end
109
How do I change the background color for specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := True;
		BackColor := $ff;
		Apply();
	end;
end
108
How do I change the foreground color for specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*.bat') do
	begin
		Folder := False;
		ForeColor := $ff;
		Apply();
	end;
end
107
How do I change the foreground color for specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := False;
		ForeColor := $ff;
		Apply();
	end;
end
106
How do I change the foreground color for specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('W*') do
	begin
		Folder := True;
		ForeColor := $ff;
		Apply();
	end;
end
105
How do I change the foreground color for specified files or folders

with ExFileView1 do
begin
	with FileTypes.Add('*') do
	begin
		Folder := True;
		ForeColor := $ff;
		Apply();
	end;
end
104
How do I get the count of all items
with ExFileView1 do
begin
	var_Count := Get[EXFILEVIEWLib_TLB.VisibleItems].Count;
end
103
How do I get the count oc checked items

with ExFileView1 do
begin
	HasCheckBox := EXFILEVIEWLib_TLB.CheckBox;
	var_Count := Get[EXFILEVIEWLib_TLB.CheckItems].Count;
end
102
How do I get the count of all items
with ExFileView1 do
begin
	var_Count := Get[EXFILEVIEWLib_TLB.AllItems].Count;
end
101
How do I get the selected folder

with ExFileView1 do
begin
	var_Count := Get[EXFILEVIEWLib_TLB.SelItems].Count;
end